<init>
subevent(mapinit,);
zukan(warppos:*all,|=,omake);

zukan(face:mame,==,1);		if(nowres); fc(mame,apr,=,1); endif;
zukan(face:shikyuu,==,1);	if(nowres); fc(shiky,apr,=,1); endif;
zukan(face:seiyu,==,1);		if(nowres); fc(seiyu,apr,=,1); endif;

zukan(enemy:valanorpa,==,1);	if(nowres); fc(vala,apr,=,1); endif;
zukan(enemy:mutou,==,1);	if(nowres); fc(mutou,apr,=,1); endif;
zukan(enemy:boruv,==,1);	if(nowres); fc(boruv,apr,=,1); endif;
zukan(enemy:demond,==,1);	if(nowres); fc(demod,apr,=,1); endif;
zukan(enemy:grpeng,==,1);	if(nowres); fc(grpen,apr,=,1); endif;
zukan(enemy:devigry,==,1);	if(nowres); fc(devig,apr,=,1); endif;
zukan(enemy:maru,==,1);		if(nowres); fc(maru,apr,=,1); endif;
zukan(enemy:rkdns,==,1);	if(nowres); fc(rkdns,apr,=,1); endif;
zukan(enemy:shina,==,1);	if(nowres); fc(shina,apr,=,1); endif;
zukan(enemy:senksha,==,1);	if(nowres); fc(senks,apr,=,1); endif;
zukan(enemy:dhmo,==,1);		if(nowres); fc(dhmo,apr,=,1); endif;
zukan(enemy:coral,==,1);	if(nowres); fc(coral,apr,=,1); endif;
zukan(enemy:ikenaitsuki,==,1);	if(nowres); fc(ikena,apr,=,1); endif;
zukan(enemy:metaele,==,1);	if(nowres); fc(mtel,apr,=,1); endif;
zukan(enemy:hollele,==,1);	if(nowres); fc(hlel,apr,=,1); endif;

zukan(item:,==,1);	if(nowres); fc(kokes,apr,=,1); endif;
zukan(item:͂ɂ,==,1);	if(nowres); fc(haniw,apr,=,1); endif;
zukan(item:sl`,==,1);	if(nowres); fc(ichim,apr,=,1); endif;
zukan(item:_},==,1);	if(nowres); fc(darum,apr,=,1); endif;
zukan(item:L,==,1);	if(nowres); fc(manek,apr,=,1); endif;
zukan(item:,==,1);		if(nowres); fc(buzzo,apr,=,1); endif;

#item(check:aleq|alpt|bank,,1); and; item(check:aleq|alpt|bank,@r,1); and; item(check:aleq|alpt|bank,Ђ傤,1); or; item(check:aleq|alpt|bank,̌,1); if(nowres); fc(yj-b,apr,=,1); endif;
zukan(item:,==,1); and; zukan(item:@r,==,1); and; zukan(item:Ђ傤,==,1); if(nowres); fc(yj-b,apr,=,1); endif;
#item(check:aleq|alpt|bank,ToCU[,1); and; item(check:aleq|alpt|bank,,1); and; item(check:aleq|alpt|bank,},1); or; item(check:aleq|alpt|bank,̌,1); if(nowres); fc(yj-c,apr,=,1); endif;
zukan(item:ToCU[,==,1); and; zukan(item:,==,1); and; zukan(item:},==,1); if(nowres); fc(yj-c,apr,=,1); endif;

#not; subevent(checkyj,); or;
#evflagsw(aks,==,0); if(nowres); fc(yj,apr,=,0); endif;
#zukan(enemy:yj-a4,!=,0);  if(nowres); fc(yj,pic,=,yj-a4); endif;

#evflag(enzyj,!=,0); and; item(check:aleq|alpt|bank,XP[gC,1); and; item(check:aleq|alpt|bank,r[T,1); and; item(check:aleq|alpt|bank,XP,1); and; 
#item(check:aleq|alpt|bank,XL[,1); and; item(check:aleq|alpt|bank,,1); and; item(check:aleq|alpt|bank,@r,1); and; item(check:aleq|alpt|bank,Ђ傤,1); and; item(check:aleq|alpt|bank,ToCU[,1); and; item(check:aleq|alpt|bank,,1); and; item(check:aleq|alpt|bank,},1); or; item(check:aleq|alpt|bank,̌,1); if(nowres); fc(yj:1,apr,=,1); fc(yj:2,apr,=,1); endif;

#SL~
#fcslc(c1); while; if(nowres); fc(*select,mvpat,0,,0); fcslc(*next); next; endif; wend;


<to_hyper>
fade(out,(type=fade,color=ffffff,wait=16)); fc(*actor,move,-14,-12,center); fc(*actor,dir,=,d); changemap(nCp[v[); fc(c5,apr,=,0); fade(in,(type=fade,color=ffffff,wait=16));


<to_hokora>
fade(out,(type=fade,color=ffffff,wait=16)); fc(*actor,move,-2,1,center); fc(*actor,dir,=,d); changemap(Kn); retpos(set,tB[h,0,0);
#subevent(hkr_yj);
fade(in,(type=fade,color=ffffff,wait=16));


<to_hokora2>
fade(out,(type=fade,color=ffffff,wait=16)); fc(*actor,move,0,4,center); fc(*actor,dir,=,d); changemap(K); retpos(set,tB[h,0,0);
fade(in,(type=fade,color=ffffff,wait=16));


<to_hokora3>
fade(out,(type=fade,color=ffffff,wait=16)); fc(*actor,move,-3,1,center); fc(*actor,dir,=,d); changemap(K); retpos(set,tB[h,0,0);
fade(in,(type=fade,color=ffffff,wait=16));


<prs1>
text(1,(face=+evfch,swait=-1),uSU߂łƂI@Ă܂ŕtĂăZL[I@܂ł̈Í́w%ct2ARjX^[%cdxIIv);
text(1,(face=+evfch,swait=-1,h=0),uw%it[*SȎT].nmicxw%it[*Xg].nmicxw%it[*gchyakupp].nmicxw%it[*slcalerm-pl].nmicxw%it[*e̊O].nmicxw%it[*eQ].nmicxw%it[*].nmicxw%it[*kdc].nmicxw%it[*}W].nmicxw%it[*̌].nmicxw%it[*lȐ].nmicxSē肵A肵łÍꉞI@fobOp̈ÍȂ񂾂ǂˁv);
#w%it[*u[X^[].nmicxw%it[*Ђ傤].nmicxw%it[*XL[].nmicxw%it[*}].nmicxw%it[*PbgM].nmicxwl`Sx
#w%it[*osb].nmicxw%it[*dub].nmicxw%it[*e].nmicx
item(check:aleq|alpt|bank,SȎT,1); and; item(check:aleq|alpt|bank,Xg,1); and; item(check:aleq|alpt|bank,gchyakupp,1); and; item(check:aleq|alpt|bank,slcalerm-pl,1); and; item(check:aleq|alpt|bank,e̊O,1); and; item(check:aleq|alpt|bank,eQ,1); and; item(check:aleq|alpt|bank,,1); and; item(check:aleq|alpt|bank,kdc,1); and; item(check:aleq|alpt|bank,}W,1); and; item(check:aleq|alpt|bank,̌,1); and; item(check:aleq|alpt|bank,lȐ,1);
# and; item(check:aleq|alpt|bank,u[X^[,1); and; item(check:aleq|alpt|bank,Ђ傤,1); and; item(check:aleq|alpt|bank,XL[,1); and; item(check:aleq|alpt|bank,},1); and; item(check:aleq|alpt|bank,PbgM,1); and; item(check:aleq|alpt|bank,,1); and; item(check:aleq|alpt|bank,͂ɂ,1); and; item(check:aleq|alpt|bank,sl`,1); and; item(check:aleq|alpt|bank,_},1); and; item(check:aleq|alpt|bank,L,1); and; item(check:aleq|alpt|bank,,1);
# and; item(check:aleq|alpt|bank,osb,1); and; item(check:aleq|alpt|bank,dub,1); and; item(check:aleq|alpt|bank,e,1);
if(nowres); text(1,(face=+evfch,swait=-1),uIH@{ɑSĎɓĂ܂́IH@ŏIÍ́w%ct2ɂႢ%cdxIIv); endif;
#if(nowres); text(1,(face=+evfch,swait=-1),uƁAɓꂿ񂾂ˁI@Ȃw%c880ɂႢ%cdxŊJƁAACeQbg̎ɂ{ɓv); endif;


<prs2>
text(1,(face=+evfch,swait=-1),uɒH蒅Ȃđ҂ȂˁI@͂悭邨܂͂čꂽ̂BɉǁA܂ŗ炱̃Q[͐eRB̏̐l邯ǁA܂ł̈Í́w%ct2ARjX^[%cdxv\ruȂ݂ɁÁ̕w%it[*henge].nmicx̓o^󋵂ɉăLN^[v);
#悭܂ŒH蒅ˁcB
#̐lpX[hĂ邩AYꂸɂˁB̂́AQ[̃tH_ɐVK쐬ŁweLXghLgxāAɃĂƂƎv
#text(1,(face=+evfch,swait=-1),u[cc鎖ccv);
#wiTȂǁAeXgp˂Ă񂾂c


<mame>
text(1,(face=+evfch,swait=-1),u^ɂȂʂ悤qgô͓łȁB\nccȂāA{҂ł͍̏lĂ܂ʂB܂Ŋłv);
#text(1,(face=+evfch,swait=-1),ů͕Kvłȁv);
#text(1,(face=+evfch,swait=-1),u̕ƂȁH@łv);
#text(1,(face=+evfch,swait=-1),uAꂽ΂݈̍͑Ӌ`ł܂Aŋ߂͂łȂłȁv);
#text(1,(face=+evfch,swait=-1),uɗł܂ȁv);
#text(1,(face=+evfch,swait=-1),ȗ݈Ӌ`ƂȁH@łv);


<vala>
text(1,(face=+evfch,swait=-1),uȂ̑䎌ꌾƁH@҂̃{Lu[œI炾v);


<mutou>
text(1,(face=+evfch,swait=-1),uPPP̃Pv);
#Anł̏oI`Ղ͂ȂƂȂȂ̂


<boruv>
text(1,(face=+evfch,swait=-1),uȂ񂩊ۂlˁv);
#{Ň̍\͍҂悭킩ĂȂ炵


<demond>
text(1,(face=+evfch,swait=-1),up܂ł͍҂̓z悭킩Ă˂炵v);
#text(1,(face=+evfch,swait=-1),up܂ł͍҂̓z悭킩Ă˂炵ȁv);
#text(1,(face=+evfch,swait=-1),ǔpȂ񂩂Ђłȁv);


<rkdns>
text(1,(face=+evfch,swait=-1),uA͗Ȃv);
#ALȂ


<grpeng>
text(1,(face=+evfch,swait=-1),uȂ񂾂ˉl̂傢Ղ́B̓yMs҂ł͂ȂˁH@SAlIԈႦv);
#text(1,(face=+evfch,swait=-1),uȂ񂾂˂̃Q[̃AeB[̖Ɖl̂傢Ղ́B̓yMs҂ł͂ȂˁH@SAlIԈႦv);
#@Ń}llꂽǂCˁH@sސTƂ͎v̂ˁH@Sɂ܂Ȃ̂ˁB
#text(1,(face=+evfch,swait=-1),uւցv);


<devigry>
text(1,(face=+evfch,swait=-1),uL~BAXĂ˂v);


<maru>
#text(1,(face=+evfch,swait=-1),u{N炪X{X苭ĈaȂBj␳Ȃ̂Ȃv);
#text(1,(face=+evfch,swait=-1),u܊pn̂_v);
#text(1,(face=+evfch,swait=-1),u܊pn̂𖳈łɏ΂Ƀ_B̎͒p̂܂菈ȂƂĂAX؂ȕ󕨂ɂȂ鎖Ă񂾂BAɑ̒NɂƂĕ󕨂ɂȂĂ鎖邩Ȃv\ruLĈǁA̎͂ƂȐlɒmĂė~񂾁v);
text(1,(face=+evfch,swait=-1),uwɍ̂āAZ炢ɂȂƏȂՓɋ鎖邩ȂǁA΂Ɏs_BŜȂ珮Xˁv);
#text(1,(face=+evfch,swait=-1),uwɍ̂āAZ炢ɂȂƏȂՓɋ鎖邩ȂǁA΂Ɏs_v);
#text(1,(face=+evfch,swait=-1),u]̎A܊pn̂΃_v);
#text(1,(face=+evfch,swait=-1),u܊pn̂𖳈łɏ񂶂Ȃv);


<shina>
text(1,(face=+evfch,swait=-1),u̐Eł̓igϗ͔łȂ̂łȁv);
#text(1,(face=+evfch,swait=-1),uَҁAwq`ldmQPxł͏\N炢̊Ԃ`hɃ~XāAzȏɉ^Q[ԂłcB`hƌĂAwKȂ^Cv̂`hłv);
#text(1,(face=+evfch,swait=-1),uَҁAwq`ldmQPxł͏\N炢̊Ԃ`hɃ~XāASɉ^Q[Ԃłcv);
#text(1,(face=+evfch,swait=-1),u鎖łcv);
#text(1,(face=+evfch,swait=-1),uwȂɌȂxƂ͌Ă͂Ȃʂłv);
#nCp[v[ERxnтŏo


<sks>
#item(check:eq,,1); or; item(check:eq,a,1);
#evflagsw(enc_senksha,==,1); if(nowres);
text(1,(face=+evfch,swait=-1),uÊ߂Ȃǂ̂悤ȏւłoAv);
#text(1,(face=+evfch,swait=-1),uÊ߂ȂǂւłoAv);
#text(1,(face=+evfch,swait=-1),uÊ߂Ȃ炱ȃw{Q[ɂo邠v);
#text(1,(face=+evfch,swait=-1),u䂪̍Ő[Zp̗͂邽߂ȂAȃw{Q[ɂo邠v);
#text(1,(face=+evfch,swait=-1),u~[nIv);
#\nnCp[v[ł͂⃌ALAtB[h̎RxnтȂǂł͂悭oB
#nCp[v[ERxnтŏo


<dhmo>
text(1,(face=+evfch,swait=-1),u͑؂ɂȂBg`g`g`v);


<coral>
sound(sleep); fade(out,(type=fade,color=ffff00,wait=64)); fade(in,(type=fade,color=ffff00,wait=64));
text(1,(face=uam,swait=-1),{ɓoꂵ10Nڂ炢ɂĂ悤₭[VɃAj[V悤ɂȂł悤B);
#text(1,(face=uam,swait=-1),[VɐFς邾ŃAj[VȂsĂ悤B);
#party(,check,l); and; member(*l,exilev,5); if(nowres); text(1,(face=*l,swait=-1),%mem[*l]u[VɐFς邾ŃAj[VȂsĂ悤v); endif;


<ikenai>
sound(uu);
text(1,(face=+evfch,swait=-1),uĎg񂳂ꐙȂ񂾂v);
#text(1,(face=+evfch,swait=-1),uȂŉ͉xg񂵂񂾂낤ȁv);
#text(1,(face=+evfch,swait=-1),uĎg񂳂ꐙȁv);


<yj-a2>
evflag(enzyj,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uA߂܂ā`BC^̂肾A_W̕ʂ͒ʂȂ悤Ȃɍs~܂ɂȂĂ鏊ƂA܂Ă̓_Hv); end; endif;
#zukan(enemy:*all,,(yj-a1,yj-b1,yj-c1,yj-a2,yj-b2,yj-c2,yj-a3,yj-b3,yj-c3,yj-a4,senkshag,jshina));
evflagsw(pr_bnyj-a4,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uA悭킽ꂽˁ`I@̕ӂ͌X҂̎Ȗp̂ŁA킴ƌȂĂ݂AՂ[ƂƂłȂĂCɂȂłˁv); end; endif;
#zukan(enemy:yj-a5,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uŌ̈ނCɂȂ́cH@``AW߂Ă炵KɕĂƁAoė肵ȂcHHv); end; endif;
#text(1,(face=+evfch,swait=-1),uŵSx̓T܂ŒBႤȂāAcI@āAFXƃZ[tˁcH@ƊE̕XIɂ́ABłĂނ낪肾ȂˁcB҂̎ɍŌ܂ŕtĂāAقƂɂ肪ƂˁcIv);
text(1,(face=+evfch,swait=-1),uŵSx̓T܂ŒBႤȂāAcI@ɂ́ABłĂ肵邩ȂˁcH@҂̎ɍŌ܂ŕtĂāAقƂɂ肪ƂˁcIv);
#\ruŵSx͌ŗLhbvĂƁALL̏Ȑłoė悤ɂȂ鎖ɂ͋CÂH@ɂ͍Ȕł̈Ӗ͖񂾂ǁAȍł͏dv݂ŁǍʂꏊȂ͂肳ĈӖAj̐lŏo|悤ɂIȈӖ݂v\ruA20^[߂̑OɉāA40^[߂Ƒ̌ʂ݂Ȃ񂾂ǁA͐킢iɑ̂h߂ɉɐ݂Ă銴݂BV[wRE邩ȂBꂱĂ݂v
#gNVVR[I
#tP[
#fc(yj:eq,apr,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uŵSx̓T܂ŒBႤȂāAcIv); end; endif;


<yj-b2>
text(1,(face=+evfch,swait=-1),ũhbvASW߂ĂĂ肪Ɓ[B%o[*heart]v);
#̃hbvASW߂Ăꂽ̂ˁ[B肪Ɓ[%o[*heart]


<yj-c2>
text(1,(face=+evfch,swait=-1),ulłB܂ŃvCĒāAƂĂłcv);


<metaele>
text(1,(face=+evfch,swait=-1),uMEAMEv);


<hollele>
text(1,(face=+evfch,swait=-1),uOAOv);


<shikyuu>
text(1,(face=+evfch,swait=-1),uȂAlv);


<seiyu>
text(1,(face=+evfch,swait=-1),u킽ďႢł傤˂v);
#text(1,(face=+evfch,swait=-1),uǂ߂ł˂v);
#text(1,(face=+evfch,swait=-1),usvcȏꏊł˂v);
#ƂŁA̘bA킽X́wxƌĂ΂Ă܂Bʂ̖OɕύX\Ƃ̎ŁAԕ󂳂Ă̂łAς肱̖OԂ藈Ƃ̎ŁA̖OŌɂȂ邩܂BɂĂ͖Ɍ܂ĂȂ݂ł
#ƂŁA̘bA킽X́wxĖOŌĂ΂Ă܂BNAʂ̖OɕύX\ŕ󂳂Ă̂łAς肱̖OԂ藈Ƃ̎ŁA̖OŌɂȂ肻łBɂĂ͖Ɍ܂ĂȂ݂ł
#text(1,(face=+evfch,swait=-1),u₩ȏł˂v);
#text(1,(face=+evfch,swait=-1),u킽āABLƂɂĂȂđvłł傤ˁccHv);
#ɂ퓬Cxg̃C[WȂłȂ݂Ȃ̂łA


<kokeshi>
#text(1,(face=uam,swait=-1),ĂB);
text(1,(face=+evfch,swait=-1),u̓Xe[^XȂ肾v);


<haniwa>
#text(1,(face=uam,swait=-1),͂ɂ킪xĂBƂĂyB);
text(1,(face=+evfch,swait=-1),u``v);
#text(1,(face=+evfch,swait=-1),uxĊyȁ`v);


<ichimaz>
#text(1,(face=uam,swait=-1),sl`ĂB);
text(1,(face=+evfch,swait=-1),u܂LтĂāAQĂ܂킟v);


<daruma>
#text(1,(face=uam,swait=-1),_}ĂB);
text(1,(face=+evfch,swait=-1),u[ށAł͐l`̂Bςȏ̂v);


<maneki>
text(1,(face=+evfch,swait=-1),uɂ`v);


<buzzou>
text(1,(face=+evfch,swait=-1),uMEʂꂽ悤łˁBf炵v);
#text(1,(face=uam,swait=-1),󒆕VĂB);


<box>
fc(*target,ans,=,16); wait(32); fc(*target,ans,=,0);

text(1,(swait=-1),uj[́w%sysm[*config].nmicx́w%sysm[*setwalkspd].nmicxŁA{Ȃǂw\ɂȂĂv); 
#text(1,(face=uam,swait=-1),̔͂̏̂悤BȂ݂Ɂw%sk[*\ݒ].nmicx́wsx̕ύXxŁA{Ȃǂw\ɂȂĂ܂B); 
#text(1,(face=uam,swait=-1),̔͂̏̂悤BȂ݂Ɂw%sk[*\ݒ].nmicxŁwړxxύX\ɂȂĂ܂B); 
#item(check:aleq|alpt|bank,ړx,1); if(nowres); 
#select2(reset,all); select2(+͂(id=0)); select2(+); select2(/); select2(*ړxԋp܂H(cid=));
#evflag(*selected,==,0); if(nowres); item(lost,ړx,1); text(1,(face=uam,swait=-1),ړxԋpB); endif;
#else;
#item(get,ړx,1); sound(warp); text(1,(face=uam,swait=-1),ړxύXł悤ɂȂI\nƂđI܂B);
#endif;

#fc(pic,,=,box-o);
#text(1,,u󔠂JʂĂȂł񂾂낤v);
#text(1,,ul̑̂ɊJȂv);
fc(*target,ans,=,-16); wait(32); fc(*target,ans,=,0);
#fc(pic,,=,box);


<pc1>
text(1,(face=uam,swait=-1),w%it[*ip[].nmicx̓o^󋵂ɉāACӂ̓GƐ킦悤B\nꕔ͕ʂ̏KvB);
#\n}͓oꂵ܂B

select2(reset,list);
zukan(enemy:*all,,(napul,garup,nabirt,napily,gapara,shadagee,alshada)); if(nowres); select2(adddtp,enegr,iv``V,); endif;
#select2(+%eng[*iv``V](id=*enegr:iv``V));
zukan(enemy:*all,,(pregener,wolzo,galkan,pozgan)); if(nowres); select2(adddtp,enegr,vQ`|YK,); endif;
zukan(enemy:*all,,(regello,lybirzo,gelfez,tyupoke,twire,bongen)); if(nowres); select2(adddtp,enegr,W`{Q,); endif;
zukan(enemy:*all,,(boodogar,garac,wehi)); if(nowres); select2(adddtp,enegr,uhK`,); endif;
zukan(enemy:*all,,(antitwire,nyamapoogi,medasorm,killson)); if(nowres); select2(adddtp,enegr,`c`L\,); endif;
zukan(enemy:*all,,(boodogar,garac,wehi,antitwire,nyamapoogi,medasorm,killson)); if(nowres); select2(adddtp,enegr,uhK`L\,); endif;
#zukan(enemy:*all,,(napaler,garaper,nabatos,napilite,gaprill)); if(nowres); select2(adddtp,enegr,ip`Kv,); endif;
zukan(enemy:*all,,(napaler,garaper,nabatos,napilite,gaprill,pyalyash)); if(nowres); select2(adddtp,enegr,ip`s,); endif;
zukan(enemy:*all,,(galken,gartyo,ryavan,groszkopf)); if(nowres); select2(adddtp,enegr,KP`OX,); endif;
zukan(enemy:*all,,(napaler,garaper,nabatos,napilite,gaprill,galken,gartyo,ryavan,groszkopf)); if(nowres); select2(adddtp,enegr,ip`OX,); endif;
zukan(enemy:*all,,(regellgo,lybirzel,belzan,munjege,weigy,benjairar)); if(nowres); select2(adddtp,enegr,W`xW,); endif;
zukan(enemy:*all,,(doublame,syncerje,dezmeed,yogeere)); if(nowres); select2(adddtp,enegr,_u`Q,); endif;
#zukan(enemy:*all,,(doublame,syncerje,dezmeed,yogeere,bendogar,garasorma)); if(nowres); select2(adddtp,enegr,_u`K\,); endif;
zukan(enemy:*all,,(pigmarg,steagral,tedsumari)); if(nowres); select2(adddtp,enegr,sO}`K\,); endif;
zukan(enemy:*all,,(nyamapregen,gidasorm,funqame)); if(nowres); select2(adddtp,enegr,j`t@P,); endif;
#zukan(enemy:*all,,(pigmarg,steagral,tedsumari,nyamapregen,gidasorm,funqame)); if(nowres); select2(adddtp,enegr,sO}`t@P,); endif;
zukan(enemy:*all,,(napelest,garepest,nafatlus,napilaty,gaprette,dakyarmee)); if(nowres); select2(adddtp,enegr,iy`_L,); endif;
zukan(enemy:*all,,(pregenia,wolzards,galkin,pozgazn)); if(nowres); select2(adddtp,enegr,vj`|YY,); endif;
zukan(enemy:*all,,(wagurtyu,ryuvzorm,yankeen)); if(nowres); select2(adddtp,enegr,Oe`P,); endif;
zukan(enemy:*all,,(pregenia,wolzards,galkin,pozgazn,wagurtyu,ryuvzorm,yankeen)); if(nowres); select2(adddtp,enegr,vj`P,); endif;
zukan(enemy:*all,,(regellgon,lybirzelk,rukanamu)); if(nowres); select2(adddtp,enegr,S`邩,); endif;
zukan(enemy:*all,,(umbot,gaogorg,qemizass)); if(nowres); select2(adddtp,enegr,E{`P~U,); endif;
zukan(enemy:*all,,(regellgon,lybirzelk,rukanamu,umbot,gaogorg,qemizass)); if(nowres); select2(adddtp,enegr,S`P~U,); endif;
zukan(enemy:*all,,(chorma,rakatsu,tsannue)); if(nowres); select2(adddtp,enegr,``c@k,); endif;
#zukan(enemy:*all,,(regellgon,lybirzelk,rukanamu,chorma,rakatsu,tsannue)); if(nowres); select2(adddtp,enegr,S`c@k,); endif;
zukan(enemy:*all,,(rashuuzan,garidrieni,idsuchi,zoclops)); if(nowres); select2(adddtp,enegr,Cc`]EN,); endif;
zukan(enemy:*all,,(napoluni,garupade,golzem,shajep)); if(nowres); select2(adddtp,enegr,i|`VW,); endif;
zukan(enemy:*all,,(valanorpa,mutou,boruv,demond)); if(nowres); select2(adddtp,enegr,om`fh,); endif;
#zukan(enemy:*all,,(grpeng,maru,rkdns,shina,senksha,dhmo,coral)); if(nowres); select2(adddtp,enegr,Oy`TS,); endif;
zukan(enemy:*all,,(grpeng,devigry,maru,rkdns)); if(nowres); select2(adddtp,enegr,Oy`Z藜,); endif;
zukan(enemy:*all,,(shina,senksha,dhmo,coral)); if(nowres); select2(adddtp,enegr,Ȃ`TS,); endif;
zukan(enemy:*all,,(ikenaitsuki,jshina,senkshag,dhmopure)); if(nowres); select2(adddtp,enegr,`cs,); endif;
#zukan(enemy:*all,,(ikenaitsuki,jshina,senkshag,ikenai2)); if(nowres); item(check:aleq|alpt|bank,},1); and; item(check:aleq|alpt|bank,Xg,1); and; evflagsw(pr_bnmoon2,==,1); select2(adddtp,enegr,`F,); select2(setenable,,nowres); endif;
#zukan(enemy:*all,,(ikenai2)); if(nowres); item(check:aleq|alpt|bank,},1); and; item(check:aleq|alpt|bank,Xg,1); and; evflagsw(pr_bnmoon2,==,1); select2(adddtp,enegr,F,); select2(setenable,,nowres); endif;
zukan(enemy:*all,,(ikenai2)); if(nowres); zukan(item:},==,1); and; zukan(item:Xg,==,1); and; evflagsw(pr_bnmoon2,==,1); select2(adddtp,enegr,F,); select2(setenable,,nowres); endif;
#zukan(enemy:*all,,ikenai2); if(nowres); evflagsw(pr_bnmoon2,==,1); select2(adddtp,enegr,F~Q,); select2(setenable,,nowres); endif;

zukan(enemy:*all,,(yj-a1,yj-b1,yj-c1)); if(nowres); zukan(item:XP[gC,==,1); and; zukan(item:,==,1); and; zukan(item:ToCU[,==,1); select2(adddtp,enegr,`P`bP,); select2(setenable,,nowres); endif;
zukan(enemy:*all,,(yj-a2,yj-b2,yj-c2)); if(nowres); zukan(item:r[T,==,1); and; zukan(item:@r,==,1); and; zukan(item:,==,1); select2(adddtp,enegr,`Q`bQ,); select2(setenable,,nowres); endif;
zukan(enemy:*all,,(yj-a3,yj-b3,yj-c3)); if(nowres); zukan(item:XP,==,1); and; zukan(item:Ђ傤,==,1); and; zukan(item:},==,1); select2(adddtp,enegr,`R`bR,); select2(setenable,,nowres); endif;
zukan(enemy:*all,,(yj-a1,yj-a2,yj-a3)); if(nowres); zukan(item:XP[gC,==,1); and; zukan(item:r[T,==,1); and; zukan(item:XP,==,1); select2(adddtp,enegr,`P``R,); select2(setenable,,nowres); endif;
zukan(enemy:*all,,(yj-b1,yj-b2,yj-b3)); if(nowres); zukan(item:,==,1); and; zukan(item:@r,==,1); and; zukan(item:Ђ傤,==,1); select2(adddtp,enegr,aP`aR,); select2(setenable,,nowres); endif;
zukan(enemy:*all,,(yj-c1,yj-c2,yj-c3)); if(nowres); zukan(item:ToCU[,==,1); and; zukan(item:,==,1); and; zukan(item:},==,1); select2(adddtp,enegr,bP`bR,); select2(setenable,,nowres); endif;
zukan(enemy:*all,,(yj-a1,yj-a2,yj-a3,yj-a2,yj-b2,yj-c2,yj-a3,yj-b3,yj-c3)); if(nowres); zukan(item:XP[gC,==,1); and; zukan(item:r[T,==,1); and; zukan(item:XP,==,1); and; zukan(item:,==,1); and; zukan(item:@r,==,1); and; zukan(item:Ђ傤,==,1); and; zukan(item:ToCU[,==,1); and; zukan(item:,==,1); and; zukan(item:},==,1); select2(adddtp,enegr,`P`bR,); select2(setenable,,nowres); endif;
zukan(enemy:*all,,(yj-a1,yj-a2,yj-a3,yj-a4)); if(nowres); zukan(item:XL[,==,1); and; evflagsw(pr_bnyj-a4,==,1); select2(adddtp,enegr,`P``S,); select2(setenable,,nowres); endif;
zukan(enemy:*all,,(yj-a1,yj-b1,yj-c1,yj-a2,yj-b2,yj-c2,yj-a3,yj-b3,yj-c3,yj-a4)); if(nowres); zukan(item:XL[,==,1); and; zukan(item:,==,1); and; zukan(item:@r,==,1); and; zukan(item:Ђ傤,==,1); and; zukan(item:ToCU[,==,1); and; zukan(item:,==,1); and; zukan(item:},==,1); and; evflagsw(pr_bnyj-a4,==,1); select2(adddtp,enegr,xiS,); select2(setenable,,nowres); endif;
zukan(enemy:*all,,(yj-a1,yj-a2,yj-a3,yj-a4,yj-a5)); if(nowres); zukan(item:̌,==,1); and; evflagsw(pr_bnyj-a4,==,1); select2(adddtp,enegr,`P``T,); select2(setenable,,nowres); endif;
zukan(enemy:*all,,(yj-a1,yj-b1,yj-c1,yj-a2,yj-b2,yj-c2,yj-a3,yj-b3,yj-c3,yj-a4,yj-a5)); if(nowres); zukan(item:̌,==,1); and; evflagsw(pr_bnyj-a4,==,1); select2(adddtp,enegr,xiSQ,); select2(setenable,,nowres); endif;

zukan(enemy:*all,,(mush,metaele,hollele)); if(nowres); evflagsw(pr_elements,==,1); select2(adddtp,enegr,LmR^zE,); select2(setenable,,nowres); endif;
zukan(enemy:*all,,(mame,mame-2)); if(nowres); select2(adddtp,enegr,}񁕂Q,); endif;

zukan(enemy:*all,,(napul)); if(nowres); select2(adddtp,enegr,iv~Ug,); endif;
zukan(enemy:*all,,(valanorpa)); if(nowres); select2(adddtp,enegr,om~Ug,); endif;

select2(count,==,0); if(nowres); text(0,퓬łO[vB); end; endif;
#select2(+(ic=close));

while;
select2(*m퓬̑In(cid=,rows=17,cols=2,maxcolw=def));
#subevent(recover,); fcwait(*actor);
evflag(*selected,>=,0); if(nowres); fade(out,(type=btdefo,color=btdefo,dep=btdefo,rot=btdefo,wait=btdefo)); battle((enegr=*evf(*selected),btm=if)); fade(in2,); goto(1); endif;

end;
label(1);
evflag(*selected,==,2); if(nowres); subevent(recover,); end; endif;
next;

wend;


<pc2>
text(1,(face=uam,swait=-1),GtFNg悤B\ngp̂̂܂B);
evflag(*selected,=,0);
while;
#zukan(effect:*select,GtFNg,(initid=*selected,rows=10,cols=1)); if(nowres);
zukan(effect,GtFNg,(mode=slcable|dspall,initid=*selected,dspdetail=0,rows=8,y=288)); if(nowres);
feffect(*selected,,*target,*actor,1); waiteffect;
next;
endif;
wend;


<hd1>
text(1,(face=uam,swait=-1),]Eł悤B\n%ct2l̂݁AnCp[liFXeXgiKjւ̐iƂȂ܂B%cd);
#\nX[p[l݂̂̓nCp[lieXgpjւ̐iƂȂ܂B
#\nxȂǂ͕ʂɌp܂BłȂi̓obOɖ߂܂B
subevent(slcjob,);
#text(1,(face=uam,swait=-1),u񂪖B̏̂悤v);


<hd2>
text(1,(face=uam,swait=-1),⌇Iȋ@\𗘗pł悤B);
#text(1,(face=uam,swait=-1),eI}P@\𗘗pł悤B);
#formem(party); member(status,mep,org,<,10); nextmem(exis);

select2(reset,pos);
while;
select2(reset,list);
#formem(party); member(select,status,mep,org,<,10); nextmem(exis); if(nowres); select2(+ődoʏ+10܂ňグiSj(id=0)); endif;
#formem(party); member(select,status,mep,org,<,15); nextmem(exis); if(nowres); item(check:eq,Rz,1); and; item(check:eq,①,1); and; item(check:eq,z[X,1); select2(+ődoʏ+15܂ňグiSj(id=1,en=*nowres,com=Fw%it[*Rz].nmicxw%it[*①].nmicxw%it[*z[X].nmicxB)); endif;
#formem(party); member(select,status,mep,org,>=,10); nextmem(all); if(nowres); select2(+ődoɖ߂iSj(id=2)); endif;
#,com=FACeɂh[sOʂZbgĂ܂܂B
#formem(party); member(eqflag,!&,000000001); nextmem(exis); if(nowres); select2(+n𑕔iSj(id=6));
#else; select2(+ۂ߂iSj,7,); endif;
party(,mxcount,<,9); if(nowres); select2(+eʂXlɊg(id=6,en=*nowres,com=p[eBɂXl܂ŉł悤ɂ܂B)); endif;
party(,mxcount,>,5); if(nowres); select2(+eʂTlɖ߂(id=7,en=*nowres,com=p[eBɉłlTl܂łɖ߂܂B)); endif;
#evflagsw(pr_bnmoon2,==,1);
#item(check:eq,Xg,1); and; evflagsw(pr_bnmoon2,==,1); select2(+ՓˏK^Yp\{l̂\}(id=8,en=*nowres,com=Fw%it[*Xg].nmicx{HHH));
item(check:eq,Xg,1); and; item(check:eq,e̊O,1); select2(+ՓˏK^Yp(id=8,en=*nowres,com=Fw%it[*Xg].nmicxw%it[*e̊O].nmicx));
#item(check:eq,},1); and; 
#w%it[*}].nmicx
#\n܂Łu܊pȂ̂ŁvƂŐ݂ĂI}P@\łBBĂ܂cB
#ƂŊFH[hj
#e̊O탂[h񔭓
#FH[h̓T
#item(check:eq,Xg,1); and; item(check:eq,e̊O,1); select2(+ՓˏK^Yp\{l̂\}(id=8,en=*nowres,com=Fw%it[*Xg].nmicxƁw%it[*e̊O].nmicx));
#select2(+X^bt[(id=9));
#select2(+⌇ACe𔃂(id=9,com=Q[oXIɊ댯ȂeXgpACeB));
select2(+e탊Zbg(id=10));
select2(+dl̐퓬摜(id=11));
#select2(+S̐l`̏(id=11));

select2(+(ic=close));
# select2(/);
select2(*mI}P@\n(cid=));

#evflag(*selected,==,0); if(nowres); formem(party); member(select,status,mep,org,<,10); if(nowres); member(select,status,mep,org,=,10); endif; nextmem(); sound(warp); text(1,(face=uam,swait=-1),S̍ődoʏ+10ɂȂI); next; endif;
#evflag(*selected,==,1); if(nowres); formem(party); member(select,status,mep,org,<,15); if(nowres); member(select,status,mep,org,=,15); endif; nextmem(); sound(warp); text(1,(face=uam,swait=-1),S̍ődoʏ+15ɂȂI); next; endif;
#evflag(*selected,==,2); if(nowres); formem(party); member(select,status,mep,org,=,0); nextmem(); text(1,(face=uam,swait=-1),S̍ődoɖ߂B); next; endif;
evflag(*selected,==,6); if(nowres); subevent(expandparty,); sound(warp); text(1,(face=uam,swait=-1),eʂXlɑI); next; endif;
evflag(*selected,==,7); if(nowres); party(,resetpos); text(1,(face=uam,swait=-1),eʂTlɖ߂B); next; endif;
evflag(*selected,==,8); if(nowres); subevent(@learnji,); next; endif;
evflag(*selected,==,10); if(nowres); subevent(@resets,); next; endif;
evflag(*selected,==,11); if(nowres); image(0,set, picture:old,,,,,,,,,); wait(-1); image(0,set,); next; endif;
#evflag(*selected,==,11); if(nowres); text(1,(face=kanban,swait=-1),S̐l`͂ꂼAẢeƌAĎŘ㔼̂ꂩQ̂hbvB); next; endif;
#evflag(*selected,==,11); if(nowres); text(1,(face=kanban,swait=-1),ȉ̓GhbvB\nV_Q[\nArmV_Q[\nO[e\nu][); next; endif;
#evflag(*selected,==,8); if(nowres); member(*l,skill,checkadd,Փ); unif(nowres); member(*l,skill,get,Փ); member(*l,skill,get,FHAe); member(*l,skill,get,OAFHe); sound(warp); text(1,(face=uam,swait=-1),%mem[*l]͋ՓˁiłɊFHAeAOAFHejKI); else; member(*l,skill,lost,Փ); member(*l,skill,lost,FHAe); member(*l,skill,lost,OAFHe); text(1,(face=uam,swait=-1),%mem[*l]͋ՓˁiłɊFHAeAOAFHejYꂽB); endif; next; endif;
#evflag(*selected,==,9); if(nowres); subevent(ending,); next; endif;
#evflag(*selected,==,9); if(nowres); buy(shop_sb); next; endif;
#text(1,(face=uam,swait=-1),ł̓Q[oXIɊ댯ȂeXgpACeĂB);

wend;

#label(6); formem(party); member(eqflag,|=,000000001); nextmem(); text(1,(face=uam,swait=-1),p[eBS𑕔ł悤ɂȂI); end;
#label(7); formem(party); member(eqflag,&=~,000000001); nextmem(); text(1,(face=uam,swait=-1),ۂ߂B); end;

#mem(head); member(status,mep,add==,10);
#if(nowres); formem(party); member(status,mep,=,0); nextmem();
#text(1,(face=uam,swait=-1),p[eB̍ődoɖ߂B);
#else; formem(party); member(status,mep,=,10); nextmem();
#sound(warp); text(1,(face=uam,swait=-1),p[eB̍ődoʏ+10ɂȂI);
#endif; 

#mem(*l); member(status,mep,nkd<=,10); if(nowres); text(0,񑕔doF10ȉ); else; text(0,񑕔doF10); endif;
#member(status,mep,all<=,10); if(nowres); text(0,SdoF10ȉ); else; text(0,SdoF10); endif;

#member(status,flag,l,mep,>,200,1,-1); member(status,flag,l,mep,+=,50); end;
#member(status,flag,l,mep,=,10);
#label(1); member(status,flag,l,mep,=,0);

#subevent(mepup,);


<learnji>
#member(*l,skill,checkadd,Փ); unif(nowres); member(*l,skill,get,Փ); sound(warp); text(1,(face=uam,swait=-1),%mem[*l]́w%sk[*Փ].nmicxKI); else; member(*l,skill,lost,Փ); text(1,(face=uam,swait=-1),%mem[*l]́w%sk[*Փ].nmicxYꂽB); endif; next;
while;
memslcbox(party,mZ̏Kn,,,2); if(nowres);
member(select,skill,checkadd,Փ); if(nowres); member(select,skill,lost,Փ);
text(1,(face=uam,swait=-1),%mem[s]́w%sk[*Փ].nmicxYꂽB);
else; member(select,skill,get,Փ);
sound(warp); text(1,(face=uam,swait=-1),%mem[s]́w%sk[*Փ].nmicxKI);
endif;
next;
endif;
wend;


<resets>
select2(reset,all);
select2(+olZbg(id=2));
select2(+ԃf[^Zbg(id=3));
select2(+vCԂZbg(id=4));
select2(+Zbg(id=5));
select2(+aZbg(id=6));
select2(+(ic=close));
select2(/);
while;
select2(*me탊Zbgn\nT(cid=));

evflag(*selected,==,2); if(nowres); while; memslcbox(all:exp,molZbgn\ncuo͂̂܂,,,3); if(nowres); member(select,exp,=,0, 0,0); text(1,(face=uam,swait=-1),%mem[s]̌olZbgB); next; endif; wend; next; endif;
#evflag(*selected,==,2); if(nowres); memslcbox(all:exp,molZbgn,,,3); if(nowres); member(select,exp,=,L1, 0,0); text(1,(face=uam,swait=-1),%mem[s]̌olZbgB); else; text(1,(face=uam,swait=-1),olZbg𒆎~B); endif; next; endif;
evflag(*selected,==,3); if(nowres); while; memslcbox(all,mԃf[^Zbgn\n܂,,,3); if(nowres); member(select,reset); subevent(kigae_sub,); text(1,(face=uam,swait=-1),%mem[s]ZbgB); next; endif; wend; next; endif;
#evflag(*selected,==,3); if(nowres); memslcbox(all,mZbgn\n܂,,,3); if(nowres); member(select,reset); subevent(kigae_sub,); text(1,(face=uam,swait=-1),%mem[s]ZbgB); else; text(1,(face=uam,swait=-1),Zbg𒆎~B); endif; next; endif;
evflag(*selected,==,4); if(nowres); subevent(@resetplaytime,); next; endif;
evflag(*selected,==,5); if(nowres); subevent(@resetitembag,); next; endif;
evflag(*selected,==,6); if(nowres); subevent(@resetgold,); next; endif;

wend;


<resetplaytime>
select2(reset,all); select2(+s(id=0)); select2(+~); select2(/); select2(*vCԂ̃Zbg\n݁F%tm(cid=));
evflag(*selected,==,0); if(nowres); playtime(=,0); text(1,(face=uam,swait=-1),vCԂZbgB); end; endif;
text(1,(face=uam,swait=-1),vCԂ̃Zbg𒆎~B); end;


<resetitembag>
select2(reset,all); select2(+s(id=0)); select2(+~); select2(/); select2(*̏(cid=));
evflag(*selected,==,0); if(nowres); item(reset); text(1,(face=uam,swait=-1),B); end; endif;
text(1,(face=uam,swait=-1),̏𒆎~B); end;


<resetgold>
select2(reset,all); select2(+s(id=0)); select2(+~); select2(/); select2(*aZbg(cid=));
evflag(*selected,==,0); if(nowres); party(,gold,reset); evflag(*64:gdbank,=,0); text(1,(face=uam,swait=-1),aZbgB); end; endif;
text(1,(face=uam,swait=-1),ȁ𒆎~B); end;